'********************************************************************
' 
'  file:  Utils.vb
' 
'  (C) Copyright 2010, Diomede Corporation
'  All rights reserved
' 
'  Use, modification, and distribution is subject to   
'  the New BSD License (See accompanying file license.txt).
' 
'********************************************************************

Namespace Diomede.SDK.ExampleVB

    Public Class Utils

        Public Shared Sub WriteMessage(ByVal msg As String)
            Console.ForegroundColor = ConsoleColor.Yellow
            Console.BackgroundColor = ConsoleColor.Black
            Console.WriteLine(msg)
        End Sub

        Public Shared Sub WriteError(ByVal msg As String)
            Console.ForegroundColor = ConsoleColor.Yellow
            Console.BackgroundColor = ConsoleColor.Black
            Console.WriteLine(msg)
        End Sub

    End Class

End Namespace